Imports pixolut.BizBlox

Public Class Student
    Inherits DataObject

'START BizBlox Generated Code : Do not remove or alter this comment
'Last Updated : Tuesday, 24 August 2004 4:01:21 PM
'BizBlox Version : 0.9.1.22818
#Region "BizBlox Generated Code"

    Public Shadows Enum Columns
        StudentID
        Name
        Email
        Age
    End Enum

    Public Overrides Function TableName() As String
        Return "Student"
    End Function

    Public Sub New()
        MyBase.New()
    End Sub

    Public Sub New(ByVal uid As Guid)
        MyBase.New(uid)
    End Sub


    Private m_StudentID As System.Guid
    Public Property StudentID() As System.Guid
        Get
            Return m_StudentID
        End Get
        Set(ByVal Value As System.Guid)
            Me.touch()
            m_StudentID = Value
        End Set
    End Property

    Private m_Name As System.String
    Public Property Name() As System.String
        Get
            Return m_Name
        End Get
        Set(ByVal Value As System.String)
            Me.touch()
            Me.BoundsCheck(Columns.Name, Value , 256)
            m_Name = Value
        End Set
    End Property

    Private m_Email As System.String
    Public Property Email() As System.String
        Get
            Return m_Email
        End Get
        Set(ByVal Value As System.String)
            Me.touch()
            Me.BoundsCheck(Columns.Email, Value , 256)
            m_Email = Value
        End Set
    End Property

    Private m_Age As System.Int32
    Public Property Age() As System.Int32
        Get
            Return m_Age
        End Get
        Set(ByVal Value As System.Int32)
            Me.touch()
            m_Age = Value
        End Set
    End Property
#End Region
'END BizBlox Generated Code : Do not remove or alter this comment

End Class




